object dtmLookUp: TdtmLookUp
  OldCreateOrder = False
  Height = 419
  Width = 625
  object qryLkpREGIONAIS: TADOQuery
    Connection = dtmPrincipal.ConexaoPrincipal
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'SELECT ID,'
      '       NOME_FANTASIA,'
      '      NOME_RAZAO '
      '  FROM REGIONAIS'
      'WHERE EXCLUIDO = '#39'N'#39)
    Left = 48
    Top = 24
    object qryLkpREGIONAISID: TAutoIncField
      FieldName = 'ID'
      ReadOnly = True
    end
    object qryLkpREGIONAISNOME_FANTASIA: TStringField
      FieldName = 'NOME_FANTASIA'
      Size = 50
    end
    object qryLkpREGIONAISNOME_RAZAO: TStringField
      FieldName = 'NOME_RAZAO'
      Size = 100
    end
  end
  object dtsLkpREGIONAIS: TDataSource
    DataSet = qryLkpREGIONAIS
    Left = 48
    Top = 72
  end
  object qryLkpPESSOA_TIPO: TADOQuery
    Connection = dtmPrincipal.ConexaoPrincipal
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'SELECT ID,'
      '       DESCRICAO,'
      '       SIGLA'
      '  FROM PESSOA_TIPO')
    Left = 144
    Top = 24
    object qryLkpPESSOA_TIPOID: TIntegerField
      FieldName = 'ID'
    end
    object qryLkpPESSOA_TIPODESCRICAO: TStringField
      FieldName = 'DESCRICAO'
    end
    object qryLkpPESSOA_TIPOSIGLA: TStringField
      FieldName = 'SIGLA'
      Size = 3
    end
  end
  object dtsLkpPESSOA_TIPO: TDataSource
    DataSet = qryLkpPESSOA_TIPO
    Left = 144
    Top = 72
  end
  object qryLkpUSUARIOS: TADOQuery
    Connection = dtmPrincipal.ConexaoPrincipal
    CursorType = ctStatic
    Parameters = <>
    SQL.Strings = (
      'SELECT U.ID, U.NOME,'
      '       U.NOME+'#39' - '#39'+R.NOME_FANTASIA DESCRICAO'
      '  FROM USUARIOS U'
      '  LEFT JOIN REGIONAIS R ON (U.FK_REGIONAL = R.ID)')
    Left = 240
    Top = 24
    object qryLkpUSUARIOSID: TAutoIncField
      FieldName = 'ID'
      ReadOnly = True
    end
    object qryLkpUSUARIOSNOME: TStringField
      FieldName = 'NOME'
      Size = 50
    end
    object qryLkpUSUARIOSDESCRICAO: TStringField
      FieldName = 'DESCRICAO'
      ReadOnly = True
      Size = 103
    end
  end
  object dtsLkpUSUARIOS: TDataSource
    DataSet = qryLkpUSUARIOS
    Left = 240
    Top = 72
  end
end
